home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C++ / Applications / nanoInstall 1.0 / source / nanoInstall.cp < prev    next >
Text File  |  1996-07-05  |  579b  |  41 lines
  1. #include "nanoInstall.h"
  2.  
  3. const unsigned char emptyPString[] = "\p";
  4.  
  5. void InitToolbox()
  6. {
  7.     MaxApplZone();
  8.     MoreMasters();
  9.     InitGraf( &qd.thePort);
  10.     InitFonts();
  11.     InitWindows();
  12.     InitMenus();
  13.     FlushEvents( everyEvent, 0);
  14.     TEInit();
  15.     InitDialogs( 0L);
  16.     InitCursor();
  17. }
  18.  
  19. void main()
  20. {
  21.     InitToolbox();
  22.  
  23.     Handle nameResource = Get1Resource( 'fNam', 128);
  24.  
  25.     OSErr result = noErr;
  26.  
  27.     if( nameResource == 0)
  28.     {
  29.         result = readThem();
  30.     } else {
  31.         ReleaseResource( nameResource);
  32.         result = writeThem();
  33.     }
  34.     if( result != noErr)
  35.     {
  36.         SysBeep( 9);
  37.         long ticks;
  38.         Delay( 20, &ticks);
  39.     }
  40. }
  41.